LISTing Newsletter

Newsletter of the
Long Island Sinc laip/Tinex
Users Group

em aa ae SS ыг: “т SE
=

à E [= 5-2 Incorporating NYTSE

iLL THE HEYS THAT'S
FIT TQ PRINT

L Í S T.

5 PERI LANE

VALLEY STREAM, NY
11581

Т0: Don Lambert: JAN/92
1201 Kibinger PL
Auburr, IN
46706-2010

1
FIRST CLASS MAIL
CORRE AET DATED MEETING NOTICE
Est AES.

N

т! + +
м + +
", + +
"n 4 +
ЫҸ + 4
", + +
"n + E
ЫҸ + +
", +
тт wv *
ү L.
Walid +
із

! ۱

1 +

+ t

4 +

і +
тш + +
т! +i i MI +
m + TE à CHE Y “| +
m +: L NB. H +
m + +
m + ө +
"m" 4 ча +
m * ul +
" Vo fnm ++
" *anan fed
m Fan ud c +
= cune +

w Е +

шк ul.
i ү Ad

к к
uJ xu L
wi
(Т.

4
M
i..

++++++++

++++++ +++ ++

ФФ +++

++

+

+++

Tob

titi + ise

++++++еыны нт ج‎

+

>

шегі m

ӘНЕ

шш

3355553825222
= = = =s === == s= s

B33 532325
322257

Hu

E
Г Шы
Fe tu CL ; e i ы
гай. >. "Ш we

TNT
z sas n qu КШ
ЕШ ч n 1 :

FAFA UD

3 FA ut
t ІШ LEX pH

(dbi КААП
zt 1 ul I Ww ІП

Cac

ЕП С

aun
“TH

IIL UU 1
Mi E Lu
кзн
"ка

3 dr
ТТГ
ТІ Ешкі

үг.

[IIO
ч En
"ET. z
А кч
к
ш
Ш

П
ШЕ!

ш t. 1 к
TM

ШИШ
te l
wk
Toki

LIST LIBRARY DISK 1 >: JL

`1 = OcharSet OL World 3/90 pgs 20 - 23, file char tap Disk #1 LISTlibryl 12/720 sectors

2 - MultiBas_hex_loader QLW 3/99 pgs 26 - 28, DIY Toolkit, MultiBas boot, EEE ES ec ccriendk aEEE EG CERE DER EM

MultiBas cde R .

3 - Graphicl QL World 12/89, SuperBASIC, pgs 36 - 38 1. CAPSlock ind boot . 2. GOMOKU 3. CHECKERS

4 - Graphic2 4 World 1/99, SuperBASIC, pgs 20 - 23 4. RESISTOR color code 5. CIRCUIT 6. BLOBS

5 - Graphic3 @ World 2/98, SuperBASIC, pgs 20 - 24 7. TREE 8. JOIN the DOTS 9. Fox and Hounds
6 - PLANT life OL World 3/99 'The Progs’, pgs 43 - 45 19. TickTack Toe 1. 80X . 12. graphics

7 - METALexch QL World 1/99 "Тһе Progs’ pg 46 13. caps bin 14. PLANT. life 15. picture puz

$ - Mendispl QL World 1/99 "Тһе Progs’ pg 47 16. Cone 17. САРЅ10ск ind 18. taktix

3 - GRAVITY 4 World 1/9 "The Progs’ pg 47 19. rader 29. CURSET ad

18 - TASK FORCE OL World 3/89 DIY Toolkit, pos 26 - 28 - Multitasker 22. giro 23. Фіто call 24. PIP bin

11 - 128K QL World 10/89 'Open Channel’, pg 10 25. JUPITER 26. BOING 27. CUBE

12 - DISKdir OL World SuperBASIC 9/89 pgs 40 -42, 11/89 pgs 22 - 24, 11/89 pgs 34 - 36 28. calc 29. S&calci 30. PIP

13 - DIYnesAL OL World 10/89, DIY Toolkit, pes 34 - 39, МЕМгез boot, MENres_cde 31. PIP boot 32. PSION Patch 33. HENres boot

14 - Three) sketch pad OL World 10/89 "Тһе Progs’ pgs 40 - 45 3. MEMres cde 35. DIYmesAL 36. Three) Sketch Pad
15 - PSION Patch QL World DIY Toolkit Extra, pg 34 - Multitasker 37. DISKdir 38. 128K BOOT 39. 128K

16 - PIP OL World 11/89 "The Progs’ ро 49, PIP boot, PIP bin ' 40. TASK FORCE 41. METALexch 42. sendisol

17 - $8са1с1 QL World 2/89 SuperBASIC pgs 30 - 32 43. GRAVITY 44. Graphic2 45. Graphic3

18 - OLcalc OL World SuperBASIC 4/89 pgs 34-35, 5/89 pgs 31-33, 6/89 pgs 22-25, 46. Graphicl 47. Char tmo 48. Ocharset

7/89 pgs 46 - 48 ( has a BUG in it, but is usable 8. G.) 49. MultiBas boot 50. MultiBas hex loader 51. MultiBas cde

19 - CUBE OL World 2/2? 'The Progs’ pgs 49 - 50 52. DIYhexldr 53. Relat2 pro 54. Relatl pro

28 - BOING 4 World 8/89 "Тһе Progs’ pg 49 55. Relation pro 56. DISASSEMB 57. COLORBAR bas
21 - JUPITER OL World 11/89 "Тһе Progs’ pgs 38 - 41 58. TEMP conv 59. BOOT PROCedures 60. SET. PRINTER
22 - C1 Window PROCedure I use for JM programs - Bob Gilder | 61. XMAS greet 62. BLOCK boot 63. BLOCKW obj

23 - CAPSlock ind OL World 1/87 "Тһе Progs’ pgs 50 - 51 64. фтарһїс®. 65. WINDEMO 66. LISTER bas

24 - Gbingo_call QL World 11/89 "Тһе Progs’ pgs 41 - 44 67. ŒD 68. DIR boot 69. DIR CODE

25 - giro 4 World 12/89 "Тһе Progs’ pgs 44 - 45 79. ADDRbook n. M 72. DARTS bas

26 - CURSET OL World 6/87 'Technical Helpline’ pgs 44 --49 73. ROULETTE bas 74. НАТЕ bas

27 - RADER OL World 3/88 'The Progs’ pgs 46 - 48 2
28 - ТАКТІХ QL World 7/88 "Тһе Progs’ pas 42 - 44

29 - Picture рит QL World 7/87 'The Progs’ pgs 46 - 47
3% - graphics OL USER 6/85 "Graphics Denes’ pos 42 - 44 Disk #2 — LISTlibry2 21/720 sectors
31 - TickTack Toe OL User 6/85 "АІ Noughts & Crosses’ pgs 34 - 37

32 - Fox and Hounds QL World 1/89 'The Progs’ pgs 48 - 49

33 - BOX 'Graphics Demo’ Don't remember where it was copied from B. б.

-----------.-..................................

: : 1. Cl 2. RAMDISK BOOT 3. RAMDISK CODE

34 - Join the Dots OL World 1/89 "Тһе Progs’ pgs 50 - 51 4. CAD bas 5. (сай boot 6. Pres boot

35 - TREE QL User 6/85 "Best of Graphics! pg 47 7. Pres doc 8. pres bin 9. fane file

36 - BLOBS OL User 6/85 "Killer Blobs’ _ 10. trivia file 11. pres file 12. pres pic

37 - CIRCUIT from Book "Making The met Of The OL’ pg 185 13. CAL boot 14. CAL bas 15. SIDEcopy bas

diciiur a a 2а ы 2L 16. LOTTERY 17. LOAN 18. LIFE

33 ES Tis Hartnell’ s book "Ganes ибаа" 19. EASEL PRT 20. loancal doc 21. STUNTHAN bas

40 - GOHOKU | , 22. SPRITE BYT 23. CAPSLOCK EXEC 24. STARPO_bas

41 - Relation pro, Relati, Relat2 OL User 7/85 & 8/85 "Family Tree’ for Archive 25. spcode bin 26. grap bin 27. STARLO bas

42 - 01555068 А. Pennell’s book "Assembly Language Programming “OL, Dissassenbler 28. Starcruiser 29. HighScore StarCruiser 30. StarCruiser_bin

43 - COLORBAR bas Bob Gilder, for RGB or Composite color monitor display 31. Tic bas 32. Lunar bas - 33. UNIT pricer
= TEMP соту fron book 'Basic Programing on the OL’ 34. RESISTOR color code 25. PARALLEL res 36. ROUND off

45 - BOOT PROCedures Some from an old issue of OL World others В. 6. 37. PARALLEL caps 38. CURRENCY солу 39. decequiv. doc

46 - SET PRINTER QL World 4/87 'Better Basic' various menus for printer set-up өлем” m RESET proc 2. Басир bas

47 - XMAS greet. Just for display at meeting a Christmas time B. G. 43. refield doc M. step] prg 45. steps prg

48 - BLOCK obj QL World 2/22 "ОТҮ Toolkit’ files BLOCK boot & WINOEMO 46. steps m 47. step4 prg 48. step3 prg

49 - GraphicOL QUANTA Newsletter Vol #2, 12 - Modified Bob Gilder 49. step2 prg 56. Refield boot 51. Eliza bas

50 - LISTER баз Воб Schubel — 52. Breakout Boot 53. breakout exe 54. HEXDEC bas

У - QD R. J. Ely AL Screen Editor 55. clocktv exec 56. Clock boot 57. Clock MC

52 - DIR boot - Load C1 (window) first, then LRUN OIR code: after loading use normal 58. clockANAL exec 89. -clock-esec 6@. LISTLIB2 lab

Dir command (DIR flpi )
53 - ADORBOOK - basic database with deno file A01 I use it with SPEEDSCREEN, B. G.
54 - DARTS bas OL World 12/2? old issue

55 - ROULETTE bas after loading a "bad name’ error will appear due to Spanish text

- type run after loading.
55 - MATE bas mare game
LIST Library Disk #1 listlibl exp a п a п

61. 1511181 lab

ТЕХ / Novanbey
LE 7292
Dear tre),

Three J snr ты Sebir zt ف‎ Jue
d: T DES, edt ат m eri We
5770 «Y pein. CU; the Y A has о

hin it that jaws the porton sf 722000 tuning бел,
seys oly, Bul The Vei o oleo „А hr bth тетт.
Е Po by 434) "Weert! pe Jeff Өрел ТУ!
Yun, "U2G Moker " pos Severd! feni orf spell it pe
jn 7, AVES (ға: move The by Ly Capo symm) the UDG
Lr, o СЕХ LE [nmake white» 5/1 pixels in the Hb G.
| E. pl (mdke 6/96) 21 pixel jn The UDG, «Е? еке afl РЭЙ
соболу dud rerfve The wy! UDG, (12 imu the prelS fom
white b block, 2%) Back > white, <M minia. The UDG left-
4 Hane, <52 sre The mo d fios کل‎ hew UDG,
Arend Thing 5 In Plein BASIC 557 hint. frm coffe fes,

LISTing

^

РА = Э ne di Р Me Le біле Мо Мега 442.
/

1 جي ¿L‏
بص ر
.1

199 POKE 6355597 Әс LET RESET =799

ð: GO TO

1999 PRINT HT 8,11;" "“jAT 9,11;
FOR Hzi TO NC

1020 LET HRz8xzíHz3 OR Н-4) LET

Nei ene” OR H=4)

à UR Ісі TO 8: FOR J-1 TO 8
1058 PRINT AT I+R+HR, J4tC+HC;
1070 IF NOT BiI+HR, Әне) THEN PR
ык PAPER 5; INK gi" و‎ о TO 19
1880 PRINT PAPER 9; INK QUE": P
for агу dia rs C C E^
1939 MEXT J: NEXT I: NEXT Н
1102 PLOT 119,158: DRAN 1223,90: D
foe @,-129: DRAN -122,0: DRAN ә,
= >
11180 PLOT 134,153: DRAW 3,4: PLO
T 848,104: DRAH 4,80: PLOT 184,39

PLOT 119,104: DRAH‏ :4-,@ ا
RETURN‏ 1120
FOR H=1 TO NC‏ 20999

2050 LET HR=82tH+2)1: LET НС=8+ Н

=2 OR H=4)

2050 FOR Ісі TO 8
2070 LET M=PEEK ІЗІН? +1-1)
2080 FOR J=3 TO 1 STEP -1
2080 LET BÍI-«HRE,J4HC) -М-2жІМТ ІМ
дее түгі MsINT ІМ/г)

ч XT J: NEXT :
2140 RETURN I: NEXT H

HRzsS8x*(íNC»2): C =S x í

NE =a OR NES 55! LET HCzaxí
заз L X=R+1: LET Y C41
30480 LET Я=22523+32+х+ү: 0
PEEK БЕ 28 25аЗ+јЗа+х+ү: POKE A,
2050 PAUSE ð
зава

aid M$=INKEYS$: POKE Я,РЕЕК

R-12
3978 IF H$:«"S" ОБ »"S" G
27003 35а M$»'"3" THEN GO
LET Y=Y+(H$="8" AND (Х‹›8+

R OR ftree*HC))-(M$z"5" AND К,
San Y6»724121

= LET XzXt*íM$z"6"1-(M$z"?")
3102 IF X>8+HR THEN LET X=1
3135 ik RE THEM LET X=8+HR
vie 22 с zc
LET xX =X +1 ect THEN LET Y=C+1

3130 IF Y«15 THEN Y2224HC-
ET X-X-1 LET Yzs2a2g*HC: L
2125 со TO 30498

sð IF M$ <¢: "g" A sits ae
GO TO 31938 NOCHES
3158 PRINT AT X,Y;

317 e IF Bix- R, ¥-0) = “по
THEN ! 1 AND Hs$z'a

THEN

LET Bix- А, Y-C)z0: PRINT PAP
ER 5; INK HE ^. PLOT OVER 1;37-4
Y-C,lla-X«R: GO TO 38048
3180 IF BIX-R,Y-C) =0 AND М%= "1"
ЕБЕ PS m ғ-Сіші: PRINT FAF
DE 1; M': PLOT 87-4v-C,
2038 B0 10 3849 ae
3 as ae " oe at
E. x a irt F“ AND H$:»"B" THEN

3200 LET B=iM$="F")

-5-

5952 SUB 4090: GO SUB 1008: G
39

IF Ms <: "E" THEN GO TO 3258
PRINT AT 19,9; IME 2; "мо CH
TO THIS CHRS "1 RETURN

IF М%<:"5" THEN GO TO 323228
PRINT АТ 18,8;"STORE UDG «Y

OR NOT Yx?"

323a PAUSE ð: LET E$=INKEY$

3300 IF gr THEN GO TO 5900
ші TO 4: PRINT ЯТ 1748

iT M: GO TO 3939

М®‹›"М" THEN GO TO 3448

338 PRINT AT 18,13; FLASH 1; IN

“3; "MIRROR": LET ҒС-ІМТ iBC/2*.

40 FOR I-1 TO BR: FOR Ј=1 TO F

OQ LET M=BiI,Ji: LET BíI,J)-Bí
C : LET BiI, BO-J+1) =M

наовар

3458 PRINT ЯТ 18,13;
Қ 3; “INVERSE”
TO BR: FOR J=1 TO B
C
3470 LET BíÍI,J!
3488 NEXT J: NEXT
50 SUB 19
Qa. co TO 398490
3500 IF Ms«»"U" THEN 50 TO 2568
pr 3; "UPSIDEDOUN": LET FR=INT (BR
FOR 1=1 TO F

3460 FOR Ізі
zNOT B(I,J)
3499 PRINT HT 18, Өз:
3504 PRINT AT 18,11; FLASH 1; IM
5510 ror “ті TO BC:

3520 LET MsBiI,J): LET BIiI,J)zB(
BR-I-*1,4J) LET BiBR-I+1,J) =H
3530 NEXT I: NEXT J

3540 PRINT AT 18,@;1%
3550 GO SUB 1088: GO TO 3040
3562 IF M$<>"T" THEN GO TO 3949

3970 PRINT AT 18,0;"SRUE ALL UDG
“3 (v OR NOT Y!7?": PAUSE д: LET

Es=INKEYS

3572 IF Es<>"¥" THEN GO TO 832

3580 PRINT AT 19,14; FLASH 1; ІМ

K 4; “SAVING”: SAVE "UDG"CODE 552

68,1 a

3582 cO TO ӛзге

«069 FOR I-1 TO BR: FOR J-1 TO B
4020 LET B(I,J!-B

4040 NEXT J: NEXT I

40680 RETURN

5000 PRINT AT 19,13; FLASH 1; IN
K 3; "STORING"

50209 FOR Н-і TO NC

5030 LET HRz8síH;2): LET HCzasíH
=2 OR Н=4)

504@ FOR Ісі TO 8

5260 FOR J =3 TO 1 STEP -1
5070 IF BiI-HR,J«HC)-1 THEN LET
T=T+2t (8-J)

5080 NEXT J

50209 POKE i5íH!-4I-1),T

5180 NEXT I: NEXT H

5129 PRINT AT i3,80;L*$

5140 RETURN

5080 FOR H=1 TO NC

5840 LET HC=(H=2 OR H=4)454+1: LE
T HR=(H>2) +9

5959 PRINT AT HR,HC; PAPER 1; ІМ

K 7; "C0"; CHR$ (CODE KS+H-1); "1"

Lüflg ізсайа 2ifiCLaif lifülgx oi OUP

2068 COLOR DEMO

by Edwin S. Salter
Milton, Florida

6960 FOR Ісі TO 8 I :
6079 PRINT AT HR+I,HC;PEEK {SiR} REM T/5 2063 COLOR DEMO

%І-1: REM E SALTER 1-20-85
ваза NEXT I: NEXT H RANDOMIZE 9
6192 LET UG=CODE K$+79: PRINT AT BORDER INT {ВНС +71

8,11; OVER 8; CHR$ UG; FOR azà TO 158: INK INT (RN
6119 PRINT CHRS (Мезі) )
5120 PRINT AT 2,11; OVER 98; CHR$ CIRCLE 127,87,a-567: PLOT a,
{UG+2);CHRS (UG+3) : DRAW 255-a-3,8: GRAY @,175-а-
6138 RETURN : DRAW -255+а+а, а: DRAWN @,-175+
70089 CLS : GO TO 8118
8000 BORDER 5: INK 28: PAPER 7: 0 i NEXT а
VER 8: FLASH 8: CLS PAUSE S8: GO TO 55
вето M ds C$i4)1: DIM. L#(32}: DIM REM GOTO 3333 to List progr
$í]
8012 PRINT ‘TAB 8;"s x UDGMAKER BORDER 7: PAPER 7: INK 8: C
ФО" ج س س س ت س س س ا ت ا س س‎ S L IST

8029 PRINT "YOU GET FOUR CHARS A
T Я TIME TO YORK ON, THE FOUR BE
ING IM A SE-RIES, LIKE :F,G,H,I»
, SET OUT INA 2X2 SQUARE ARRAY."

wu батыл ENUT Tue среды суа
t 4 2 iF !

T «F.G,H,I:. THE HIGHEST CHAR YO For the TS 1000/2X81
U GAN INPUT, IS «Ry, FOR THE SET

goad INÉUT "FIRST CHAR: ";K$: IF BOXES

aed INK 2: PRINT ^ "YOU ARE WORK |
| 2: PRINT '"YOU ARE UO
ING ON CHAR SERIES:"''TRB 11;"[" DX SEBRE EERE

8052 FOR I=3 TO 3: LET С%(1І+1) =С
HRS (CODE K$-I!

809659 PRINT СНЕЖ (CODE K$+I T
: NEXT I: PRINT CHRS PETERE Е

ә

81808 LET HCz4: DIM Stnci

8118 LET BR=16: LET ВС-15

8128 DIM CiBC): DIM BBR, BCO}

8122 PAUSE 15а: CLS

8140 FOR I=8 TO 3: PRINT INK 2;R
T 7,18; C$tii; TAB 13; 08 (2) ° ° "TAB
180; C# (3); TAB 13;С%14

8158 LET 54141) sUSR CHRS (CODE К

2:1) 10 REM "BOXES"

8162 NEXT I SES S 5
8170 PRINT AT 18,12; FLASH 1; IN 20 GEH BY STERREN ROUTIERS
K 4: "FETO HING" 4.0 5014 a

8188 LET B-0: GO SUB 4000: GO SU 29 LET Gre.

CEA 60 LET J=43

8200 LET R=: LET C-14 SB een PSS Tord

8210 GO SUB iege 90 PLOT F.J

82280 PRINT AT 13,0;L5* 100 PLOT F.G

239 GO SUB зада: GO sup 5099 299 NEXT E C

8250 PRINT AT 20,0;" COPY «Y OR 150 MON N

NOT Yè?" 130 PLOT H,K

8260 PAUSE 2: LET ES-INKEYS: IF 140 PLOT G'E

E$-"Y" THEN COPY 150 NEXT K `

8320 PRINT AT 28,0;L4;L$;AT 29,9 160 LET J-J-2

i" NEXT UDG «v OR NOT vo? 170 IF J-21 THEN STOP

8350 PAUSE Ə: LET ES=INKEYS: IF faa Ter Genes т

E$c»"Y" THEN CLS : PRINT AT 10,1 ico PET MIS

2; "+ STOP s": STOP 200 GOTO 30

3388 CLS : RUN |

3906 CLEAR : SAVE "UDGHMRHKER" LIN

° TS2068 Software

10 POKE 23658,8: BORDER 5: РАР
ER 5: INK Q; CLS

12 PRINT TAB 10; BRIGHT 1;" +
TUTEST x "; BRIGHT O°°'’"c4> HORI
ZONTAL COLOR BARS"’’"<2 > UERTICA
L COLOR BRRS"’‘"<3: GRID OF LINE
$£"''"i45 CHECKERBOARD" 1 “¢5, COM
PUTER ADJUSTMENTS"''"i8» END OF
TEST"

14 INPUT "TEST NUMBER = ";R: I
F Ril OR R:6 THEN GO TO 14

Үү: LET Asi1)z2"BLK

LET Ag{(31="R

LET 8вібіс СҮЙ": LET ASI?
: LET R$18)-"UHI"
гә GO TO їн+1@@) қ
FOR I=8 TO 5
4

к:
л
о!
нч!
X:
Hs
uw -.
e |
Cd

188 PAPER 7: CLS

PRINT RT Is3,0; PAPER I;"
". PR
INT INK 3; PAPER 8;HT І#3+1,14;Я
&{1+1}): NEXT
ie4 GO TO 722 қ
2a3 PAPER 7: CLS : FOR I=@ TO 2
1: PRINT PAPER 8;" “; PAPER 1
НЫ; “; PAPER 2;" "i PAPER 3
p? "i PAPER 4;" "i PAPER 5
4% “7 PAPER 6;" "> PAPER 7
ph "з: NEXT I _
FOR I=@ TO 7: PRINT PAPER 8
аҙат 1ё,ї+&+1;85{1+1}: МЕХ
за TO 700
CLE : FOR I= TO 255 STEP 3
PLOT I,0: DRAN 80,175: NEXT
FOR I=@ TO 175 STEP 21.85:
От Q.I: DRAW 255,2: NEXT I
24 GO TO 700
88 PAPER 7: CLS : L =@: LET
=@: FOR к=1 ТО 28: PRINT BRIGH
к ШЕЛІ се Iri J" "гат Tad,"
"ат Teas "AT T4453"
“Т LET І=1+8: IF.I»19 THEN LET
I=I-29: LET J=Jł4
$82 NEXT К
494 GO TO тос E.
SOQ PAPER ^. CLS : PLOT 255,150
DRAW -150 2: DRAW @,-128: DRAH
153,3: PLOT 288,150: DRAW 2,-42
. DRAW -35,2
S02 CIRCLE 155,55,25: PRINT AT
13,21; "SPKR"; AT 4,15; “RE = -MOD" -
sa4 PRINT OVER 1;HT 6,15; "A-20"
енге 8; "-"; АТ 14,14; "3-70"; CHRS
“L TAT 8,47; "1-70"; CHRS 8;"-'
neo Rt a: на
RINT AT 2,2; "REMOVE ТОР ІК
ID) AND PROP IT UP. ІТ I$

š

BY à FLAT RIBBON CABLE;
ULE IT OPP a
E

=

б“ m
COO Ut HI

Li “THERE AR
REWS FOR "' “ADJUSTMENT : u
RAWLS AND RIPPLE"''":1

iR AND "'" GHOST"^'"«g&2» CU

AND PLURITY"''"TUEEK THESE
RY GENTLY" “WHILE INSPECT H IN
Tu IMAGE. WHEN FINISHED c
LY REPLACE THR TOF.
"SCREENS COPY ty BR N
R£z"Y" THEN COPY
тга z
PRINT AT 10,12;"* STO

WHEN DON
LINE @

UT "HIT (ENTER?
P RUN
AVE "TvTEST'

+ aa 6: БӨБЕК 6. INK 2: С
LS P 3,18: ЕР 18,5

= BRENT AT 44271212225 їо L
TTERTILE written and produced
bu John Pazmino of Brooklyn NY

pecially for the | Long Island E
песа Timex club (LIST? and th

чеш York Timex- Sinclair Enc
8 PRINT ат ё@,0;"ргё55 anu to
to start LETTERTILE": PAUSE а
12 BORDER 5: PAPER 5: INK O: C
Lš : PRINT TAB 5;" x D
LE x"''"Move the Letters with th

e arrow keys to put them in ABC

Order. Your moves are counted a
nd you сап try again for a Loue
f score.

12 DIM е%(32): DIM а%1(5,5)

< ر‎ w ?
14 LET b$z"RHECDEFGHIJKLMNOPGREZ
TUUUX ": LET с®=Ь%: LET dg=""
1б FOR ізі TO 25: LET mzINT ti
+tANDS (26-131: LET d$zd$s«cs$imi: L
ESTE TO м-1) +с%іт+1 TO 1: N
SE

40 LET а%{1) =4${ TO 5):
i2)zd£io TO 103: LET agis )zd&t
TO 15): _ LET 88147484116 TO Зат

$ :
44 NEXT c: г
= 2 4; PABER, 2: ЕЕЕ
в, "=з a e a Ев a E а". дт 20,5; "Ua".
SAR

62 FOR isi TO 12: PRINT AT 8-і
B8; EU RT 8+1 ,22; "8°: NEXT i: |
7T: INK Ø

54 FOR ісі TO 5:
|. PRINT PAPER 6; AT
(1,4): NEXT у: NEXT i

L
58 PAUSE ð: LET ms=INKEYS
ісші AND ms£z'"a"3 OR

FOR j=l Ta =:
a42£zi1,842-4:8

E
H
^"

‚@; ӘН 1; PAPER 5; INK 2
YOU CAN'T MOVE THAT WAY: +
27,5 PRINT AT 21,8;
6; |

5 “PRINT PAPER 6;AT 8+2+г,8+=2 +
cj" "SAT B4+2err,9+2eccjasire CC)
LET т=т+1: PRINT AT 7,445 H
DUE "jm
50 IF aSíl)r«asi2)sa$íz!
-bs THEN GO TO 100
82 GO TO 68
100 PRINT AT 21,0; PAPER 5; INE
2; FLASH 1;" s YOU DID IT IN 7;
mi" MOVES! s ": FOR i=l TO 188:
ВЕЕР .1,i-50: NEXT i
222 INPUT “REPLAY SAME GAME ive
Pio "ims; IF DES yo THEN PRINT P
BEER S;HT 21,8;€8;AT ?,Ə;es: GO

„204 INPUT “ALL NEW GAME улп:
“ims: IF m=" 9" THEN RUN

:ج5 2+

10б PAPER 5: CLS : PRINT AT 12.
2; "+ STOP s". STOP -

200 CLEAR i 'LETTERTILE" i
INE 8

L | HARD |

QL To IBM RGB Monitor Connections

In the past feu weeks I have had three requests for information оп hou to hook-up an
IBM CGA ог RGB Monitor toa QL. The following information will allow anyone with
soldering experience to make an appropriate cable between the QL and an RGB monitor.

The only problem you may encounter is with the horizontal sync inversion from a
negative going sync signal from the QL to a positive going horizontal signal required
for most, if not all, American CGA/RGB monitors.

Іп the following diagrams, I use а 74LS00 TTL IC (Quad 2-input positive-nand gate), of
which we will use pins 1 and 2, tied together to form an inverter input. The signal
from the QL, which is negative, enters the input of the inverter, pins 1 & 2. The sync
signal is now inverted within the IC and a positive horizontal sync signal is
available at pin 3 which is connected to the horizontal pin on the monitor connector.

If you happen to have а 741504 Hex inverter IC, it also сап be used - just use pin 1

as the horizontal input from the QL and рїп 2 will be the inverted sync signal output
connected to the monitor connector. :

All parts for this project can be purchased at any Radio Shack store. In addition to
purchasing the two connectors and IC, you will need a 9 pin 'D' connector hood, which
if you are careful, can house the IC - just carafully clip all unused pins on the IC
and bend pins 1, 2, 3, 7, & 14 in towards the center of the IC. Solder the wires with
minimum solder and install the IC upside down (pins facing up) and the two piece
connector hood will house it, ailowing а clean appearing installation. You will also
need a length of cable determined by your requirement. The cable need only be 7

conductors, or if you wish, use 7 - single lengths of multi-stranded wire to form your
cable.

Male 9 Pin ’D’ plug (solder pin side)

5 4 3 2 1
M. ter? з ed S. = s: Jumper pins 1 & 2
N o о о о /
E dE c

Connections to the male 9 pin ’D’ connector
Pin #’s

Ground (common)

Ground (common)

Red (RGB signal)

Green (RGB signal)

Blue (RGB signal)

N/C (no connection)

N/C (no connection)

Horizontal Sync (negative signal - must be inverted)
Vertical Sync (Most monitors do not require Neg. sync)

O 0 N Q Q b Q N

2 8-

!
! !
! !
ground 57 | o 70 ! в IC-1 will only have
Use pin 87,IC-1 as common ! 1 5 pins used, #’s 1, 2,
Ground points for both 610 4019 3, 7, and 14.
cable connectors - Н i
(9 ріп 'D' pint 1&2) 5!0 Lo ! 10
(8 pin 'Din pin & 2). | i
4 1 0 $ o oh 44
П '
! LI
Horiz Sync out to 9 pin(-3 ! o фо ! 12
'D' connector, pin #8. ! i
Horiz Sync input from -»2 ! о @o ! 13
QL connector (pin #4) 2 !
(Pins 1 & 2 are jumped 110 o | 14‹- +5 volts from QL connector
together to form an : E ! (Pin #1).
inverted signal input). اسا اسسا‎

741500 TTL IC wired as an inverter - IC-1
Bottom side up (pins up)

<- plug notch

o
'
u

2

8 Pin DIN connector(solder pin side)

Connections to the male Din 8 pin connector

Pin #’s

+ 5 volts DC

Ground (common)

Composite Signal (not used for RGB)

Horizontal Sync (negative sync - must be inverted)
Vertical Sync (Most monitors do not require Neg. sync )
Green (RGB signal)

Red (RGB signal)

Blue (RGB signal)

очосоьомке

Cable Connector hookup

Pin #1, 8 pin Din connector to pin #14, IC-1 (+ 5 Volts DC)
Pin #2, 8 pin 'Din connector to pin #7, IC-1 (Common Ground)
Pin #3, 8 pin Din connector NOT USED!

Pin #4, 8 pin Din connector to pin #’s 1 & 2, IC-1 (Horizontal sync input)

-8 -

Pin #5, 8 pin Din connector to pin #9, 9 pin 'D' connector (Vertical Sync)
Pin 46, 8 pin Din connector to pin #4, 9 pin 'D' connector (Green RGB signal)
Pin #7, 8 pin Din connector to pin #3, 9 pin 'D' connector (Red RGB signal)
Pin 48, 8 pin Din connector to pin #5, 9 pin 'D' connector (Blue RGB signal)
Pin #1 and #2, 9 pin 'D' connector to pin #7, IC-1 (Common Ground)

Pin 43, 9 pin 'D' connector to pin #7, 8 pin Din connector (Red RGB signal)
Pin #4, 9 pin 'D' connector to pin #6, 8 pin Din connector (Green RGB signal)
Pin 45, 9 pin 'D' connector to pin £8, 8 pin Din connector (Blue RGB signal)
Pin #6 & #7, 9 pin 'D' connector NO CONNECTION

Pin #8, 9 pin 'D' connector to pin #3, IC-1 (Positive Horizontal sync output)
Pin #9, 9 pin 'D' connector to pin #5, 8 pin Din connector if required (Vertical sync)
Pin #'s 1 & 2, IC-1 to pin #4, 9 pin 'D' connector (Negative Horizontal sync)

Pin #3, IC-1, to pin #8, ріп 'D' connector (Positive Horizontal sync out)

Pin 87, IC-1 (two

wires), to pin #'s 1 & 2, 9 pin 'D' connector and to ріп #2, 8 pin Din
connector :

Pin #14, IC-1, to pin #1, 8 pin Din connector (Pin #1 is labeled PAL in the OL manual,
however, the US QL's have a 5 volt DC connection at this pin).

List of parts: Radio Shack part numbers indicated

274-026 8 pin male DIN plug $1.79

276-1537 9 pin male 'D' plug $0.99

276-1539 9 pos 'D' Hood $0.79

276-1801 7400 Quad 2-input NAND gate $0.89

276-1802 7404 Hex inverter $0.99 x
278-775 9 conductor, double shielded cable $0.59 per foot

x Use the 7404 Hex inverter as an alternate IC.

Additional Information:

An RGB monitor will display 8 primary colors; black, red, yellow, cyan, green, blue,
magenta and white. If you purchase a CGA monitor, yellow will appear brown and white
will be tinted blue or dirty looking. This is set-up in the G2’s (grids of the
Picture tube) to produce these differences in color because; CGA monitors have one
additional line called Intensity. CGA will provide 16 colors if the intensity line
is used - IBM only! Yellow will be yellow when intensified and white will be white.
You may also find that when you power-up the QL, the tweed: memory check display and
the F1 - F2 display will roll until you press either function key; then it will
stabilize. Try not using the vertical sync line, it may eliminate this problem.

NOTE: If you require any assistance, contact me through LIST.

Bob Gilder

-18-

WL UUKNCKR
GUIDE TO TROUBLE SHOOTING

Not too many years ago, when computers
were made of wired keyboards and any
number of discrete boards, fault-finding
was a little easier for the layman. If a
faulty board could be found it could be
.removed and replaced, a relatively
inexpensive job.

The OL has a membrain keyboard,
internally, and only one board. The
memory chips are soldered in and the
microdrive cartridge mechanism is part
of the case, and the microdrive
recording heads are not adjustable.

Those are, of course, some of the
features which permit such a powerful
computer to be sold at such lou cost, so
we can hardly complain.

This implies that fault finding and
repair work by the knowledgable owner is
a little more difficult. One big
handicap is that no circuit diagram is
supplied with the QL as standard. It is
suggested that unless you have a good

or re-set.

Large Blocks/stripes of color
and possible speaker noise.

No re-set or spurious re-sets
: occurring.

QL locks-up after specified
time.

QL locks-up at random.

Microdrives fail to read/
write properly оп a cart-
ridge in use in one drive
only.

Microdrive fails to read
cartridges recorded by
another drive.

Green/white screen on power-up

deal of experience of repair work, a QL
service manual is essential. Custom
chips; the ZX 8301 and ZX 8302 сап be
obtained from Sharps if needed.

If you do not feel confident about
attempting a repair yourself, I believe
that Dan Elliot still repairs
Timex/Sinclair computers. If you could
be specific about a faust, say, a
microdrive is not working properly. Ask
yourself, in what way(s) is it not
working? If the QL continuously locks
up, is there а good reason for the
lock-up? Ву looking carefully ай the
options you тау save yourself а repair
bill. Let us consider a number of common
fault areas in the QL.

The following table lists faults against
possible problems. The list of numbers
relates to the actions you can take to

‚сиге a fault or check the area where it

lies. The related actions are listed
belou this table.

!
!
CAUSE CHECK !
i
!
Faulty expansion 1,2 |
port or RAM. '
'
'
Chip or bad chip 3 !
pin contact. -
'
!
Faulty re-set 4,5 '
switch. '
'
1
Overheating/ 3,6,7,8 !
bad contacts/ !
noisy A-C or '
marginal RAM. i
'
'
Noisy A-C/bad 3,7,8 i
contacts or i
marginal RAM. i
1
'
Noisy A-C or 6,7 '
over-heating. i
1
'
'
i
Bad alignment. 9 I
'
'
8
!
!

L

Microdrive fails to read/
write any cartridge.

Certain keys; not usually
the complete set; fails to
operate.

Remove any expansion module and check
operation. If the fault is cured the
expansion module is faulty or
requires too much power from the QL.

External ВАМ is
number 1 above.

faulty. Treat as for

Bad chip contacts сап be checked and
cleaned only by removing all possible
chips - not the ones soldered in -
from the main board. Do not perform
this unless you are confident and
obey all normal rules regarding
static-sensitive devices.

Re-set switch has been damaged by
upward pressure while using it. Check
state of switch by removing QL lid.

Power plug connections are weak
through too much use. Replace or hard
wire pouer lead.

QL CORNER

Archive: Watch the saves
Archive file saving options,
ways. If you produce a
drive filename"
saved as a text file which
this type of file back
SuperBASIC program;

'
'

CAUSE CHECK '

'
'

Over-heating/ 3,6, '

bad pin con- '

tacts or faulty '

drive. i

1
'
Faulty keyboard 19 '
membraine. Н
H
1
'

6. Over-heating; keep away from direct
sunlight and other heat sources. Do
not cover vent holes. Remove any
expansion boards to see if they are
drawing too much power from the QL.
Place small silent fan behind right-
hand-side of machine or, if confident
- and as a last resort - remove the
voltage regulator and heatsink to the
outside oí case.

7. Noisy А-С power line. This can be
rectified by using suppressor module.

8. If QL contains marginal ог ’lossy’
ВАМ, a full БАН test will be needed
to check operation oí ВАН.

‚ 9. If microdrive heads are mis-aligned,

there is little hope of cure except
by a complete replacement.

10. Replace faulty keyboard membraine.

although similar, work in different
collection of PROCedures and input "SAVE
(save flp2,. procedures),

the procedures will be

will be appended with ".prg". Loading
inte Archive
it is slow.

is similar to loading а

Saving the procedures using the "SAVE OBJECT drive filename" will
save the file in a tokenized form used internally by Archive. The

process is roughly

analogous to compiling a

Basic program. This

type of file is appended with " pro", and takes up more media
space, but can still be modified after re-loading it into
Archive.

If a file is saved with command "SAVE PROTECT drive

filename",
or modified in any way.

it is also appended

with "pro", but cannot be listed

This type of file should be used only:

a] if you have spent a considerable amount of time

developing
you

meaningful
want to protect;

Archive
and

routines which

b) only if you are very sure that you will not want
to modify them at some future date; and

c] only if you have also saved them as " prg" files

as well.

With the possible exception of accessibility and loading time for

a large PROCedure file,

the end-user
difference between either of the three SAVE variations.

ae

is unlikely to notice any

1/20/91